* which-key.el (which-key--pad-column): Untabify.
authorJeremy Bryant <jb@jeremybryant.net>
Sun, 10 Mar 2024 22:40:47 +0000 (22:40 +0000)
committerJustin Burkett <justin@burkett.cc>
Tue, 12 Mar 2024 20:32:40 +0000 (16:32 -0400)
which-key.el

index dcb5af7ce7d27e6a7ace7249684b39ec5b25f553..fcdaec4a1760d0702111de01758e7ca6a104b358 100644 (file)
@@ -1996,17 +1996,17 @@ that width."
   (let* ((col-key-width  (+ which-key-add-column-padding
                             (which-key--max-len col-keys 0)))
          (col-sep-width  (which-key--max-len col-keys 1))
-        (avl-width      (- avl-width col-key-width col-sep-width))
+         (avl-width      (- avl-width col-key-width col-sep-width))
          (col-desc-width (min avl-width
-                             (which-key--max-len
+                              (which-key--max-len
                                col-keys 2
-                              which-key-min-column-description-width)))
+                               which-key-min-column-description-width)))
          (col-width      (+ col-key-width col-sep-width col-desc-width))
-        (col-format     (concat "%" (int-to-string col-key-width)
+         (col-format     (concat "%" (int-to-string col-key-width)
                                  "s%s%-" (int-to-string col-desc-width) "s")))
     (cons col-width
           (mapcar (lambda (k) (apply #'format col-format k))
-                 col-keys))))
+                  col-keys))))
 
 (defun which-key--partition-list (n list)
   "Partition LIST into N-sized sublists."